home *** CD-ROM | disk | FTP | other *** search
- object ScannerTestForm: TScannerTestForm
- Left = 317
- Top = 163
- Width = 220
- Height = 171
- Caption = 'Scanner Object Tests'
- Font.Color = clWindowText
- Font.Height = -14
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 96
- TextHeight = 16
- object ListCountriesButton: TButton
- Left = 26
- Top = 45
- Width = 160
- Height = 33
- Caption = 'List Countries'
- TabOrder = 0
- OnClick = ListCountriesButtonClick
- end
- object ListBigCountriesButton: TButton
- Left = 26
- Top = 77
- Width = 160
- Height = 33
- Caption = 'List Big Countries'
- TabOrder = 1
- OnClick = ListBigCountriesButtonClick
- end
- object CountryTable: TTable
- Active = True
- DatabaseName = 'DBDEMOS'
- TableName = 'COUNTRY.DB'
- Left = 40
- end
- end
-